(select-safe-coding-system): Check for

non-nil CODING-SYSTEM before warning it disagrees with AUTO-CS.

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index c3d3aa8b142ad5180e336ba503ff9ec02e29b275..1b59acdf67a79225a3b6464d5c514d77c712d2a5 100644 (file)
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -766,7 +766,7 @@ one of the following safe coding systems, or edit the buffer:\n")
                         (goto-char (point-min))
                         (set-auto-coding (or file buffer-file-name "")
                                          (buffer-size))))))
-       (if (and auto-cs
+       (if (and auto-cs coding-system
                 ;; Don't barf if writing a compressed file, say.
                 ;; This check perhaps isn't ideal, but is probably
                 ;; the best thing to do.